www.gusucode.com > 酷维企业网站CMS管理系统 v2.1.0 > 酷维企业网站CMS管理系统 v2.1.0\code\Xl_list.asp

    <%
'程序名称:酷维企业网站程序CMS
'运行环境:ASP+ACCESS
'程序大小:4.60MB
'软件类型:ASP源码
'联系方式:QQ:921072227
'程序演示:企业程序
'官方网站:http://cms.coczz.com
%>
<!--#include file="Connection.asp"-->
<!--#include file="admin/system/WebConfig.asp"-->
<!--#include file="admin/system/Check_SI.asp"-->
<style type=text/css>
body {
	scrollbar-face-color: #555555;
	scrollbar-highlight-color: #555555;
	scrollbar-shadow-color: #555555;
	scrollbar-3dlight-color: #ffffff;
	scrollbar-arrow-color:  #ffffff;
	scrollbar-track-color: #ffffff;
	scrollbar-darkshadow-color: #ffffff;
} 
</style>
<link href="xl.css" rel="stylesheet" type="text/css">
<table width="13%" border="0" cellpadding="0" cellspacing="5" bgcolor="#FFFFFF">

<tr bgcolor="#FFFFFF">
<%
dim id
id=trim(request("id"))
if id="" or not isnumeric(id) then
tt="select top 8 id,x_name,x_jingdiantupian,x_leiid,x_top from xianlu order by x_top desc"
else
tt="select id,x_name,x_leiid,x_top from xianlu where x_leiid="&id&" order by x_top desc"
end if
set er=conn.execute(tt)
while not er.eof
%>
<td height="24" align="center" bgcolor="#F6F6F6">


<img src="<%=er("x_jingdiantupian")%>" width="130" height="100" border="0"/><BR />
<a href="Xl/Xl_<%=er("id")%>.html" target="_blank"><%=left(er("x_name"),10)%></a></td>
<%
er.movenext
wend
er.close
%>
</tr>

</table>